object Form1: TForm1 Left = 1 Top = 1 Width = 603 Height = 473 ActiveControl = DIRLIST Caption = 'HD95Admin' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Position = poScreenCenter Scaled = False Visible = True OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 13 object DriveTabSet: TTabControl Left = 8 Top = 8 Width = 577 Height = 185 TabOrder = 0 OnChange = DriveTabSetChange OnChanging = DriveTabSetChanging object FILES: TFileListBox Left = 329 Top = 6 Width = 244 Height = 173 Align = alClient IntegralHeight = True ItemHeight = 13 TabOrder = 1 OnChange = FILESChange OnEnter = FILESEnter OnKeyUp = FILESKeyUp OnMouseDown = FILESMouseDown OnMouseMove = FILESMouseMove end object DIRLIST: TDirectoryListBox Left = 4 Top = 6 Width = 325 Height = 164 Align = alLeft FileList = FILES IntegralHeight = True ItemHeight = 16 TabOrder = 0 OnChange = DIRLISTChange OnDblClick = DIRLISTDblClick OnEnter = DIRLISTEnter OnKeyUp = DIRLISTKeyUp OnMouseDown = DIRLISTMouseDown OnMouseMove = DIRLISTMouseMove end end object TRUSTEE_BOX: TGroupBox Left = 8 Top = 232 Width = 481 Height = 153 Caption = '&Rights' Color = clBtnFace Ctl3D = True ParentColor = False ParentCtl3D = False TabOrder = 1 object TrusteeBox: TListBox Left = 2 Top = 15 Width = 477 Height = 138 Align = alTop ExtendedSelect = False ItemHeight = 13 Style = lbOwnerDrawFixed TabOrder = 0 OnDragDrop = TrusteeBoxDragDrop OnDragOver = TrusteeBoxDragOver OnDrawItem = TrusteeBoxDrawItem OnEnter = TrusteeBoxEnter OnKeyDown = TrusteeBoxKeyDown OnKeyPress = TrusteeBoxKeyPress OnKeyUp = TrusteeBoxKeyUp OnMouseDown = TrusteeBoxMouseDown OnMouseMove = TrusteeBoxMouseMove end end object BUTTONS: TGroupBox Left = 496 Top = 232 Width = 89 Height = 153 TabOrder = 2 object EXIT_BUTTON: TButton Left = 8 Top = 120 Width = 75 Height = 25 Caption = 'E&xit' TabOrder = 1 OnClick = EXIT_BUTTONClick end object SAVE_BUTTON: TButton Left = 8 Top = 88 Width = 75 Height = 25 Caption = '&Save' TabOrder = 0 OnClick = SAVE_BUTTONClick end object HELP_BUTTON: TButton Left = 8 Top = 16 Width = 75 Height = 25 Caption = '&Hilfe an' TabOrder = 2 OnClick = HELP_BUTTONClick end end object PATH_LABEL: TMemo Left = 8 Top = 200 Width = 577 Height = 33 TabStop = False Color = clInfoBk Lines.Strings = ( 'HINT_LABEL') ReadOnly = True TabOrder = 3 end object HELP_MEMO: TMemo Left = 8 Top = 392 Width = 577 Height = 49 TabStop = False Color = clInfoBk Lines.Strings = ( 'HELP_MEMO') ReadOnly = True ScrollBars = ssVertical TabOrder = 4 WantReturns = False end end